\begin{tabbing}
(\=(Unfold `p{-}fun{-}exp` ( 0)$\cdot$) \+
\\[0ex]CollapseTHEN (((RecUnfold `primrec` 0) 
\\[0ex]CollapseTHEN (((((
\-\\[0ex](if (0) =0 then SplitOnConclITE else SplitOnHypITE (0))$\cdot$) 
\\[0ex]C\=ollapseTHENA (Auto$\cdot$))$\cdot$) \+
\\[0ex]
\\[0ex]CollapseTHEN ((((Try ((Complete (Auto'))$\cdot$))$\cdot$) 
\\[0ex]CollapseTHEN (((Fold `p{-}fun{-}exp` 0) 
\\[0ex]
\\[0ex]CollapseTHEN (((Reduce 0) 
\\[0ex]CollapseTHEN (((BLemma `p{-}compose{-}inject`) 
\\[0ex]CollapseTHEN (
\-\\[0ex]Auto$\cdot$))$\cdot$))$\cdot$))$\cdot$))$\cdot$))$\cdot$))$\cdot$))$\cdot$
\end{tabbing}